home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 76 / XENIATGM66.iso / Indiana Jones / Indiana Jones.exe / RESOURCE / PREVIEW.GOB / cog_teo_hint2.cog < prev    next >
Text File  |  1999-11-15  |  18KB  |  524 lines
  1. # Jones 3D Cog Script
  2. #
  3. # TEO_Hint2.cog
  4. #
  5. # Solves hints 
  6. #
  7. #   Basically, considers hints as one linear list with discrete groups located within   
  8. # that whole. For example a list of objects array indexed from 0-9 could contain a sub group of objects
  9. # index numbered from 6-8. The first item in this sub group of objects could be accessed 
  10. # directly by retrieving the value stored in index 6 and so forth. What this allows for is
  11. # non linear access to a linear list of objects. For example if jump to a part of the level that
  12. # uses hints 6-8 but I have only solved hints 1 and 2 the current hint system will show the next hint as 
  13. # hint 3 which not only confusing but wrong. This way when Indy enters any part of the level (you have to track this)
  14. # he can force the hint to be teleported to hint 6 and so forth.
  15. #   The other important thing to remember is that there is only one hint that is never solved or unsolved.
  16. # the hint is just teleported to the appropriate position based on where the player decided to go, hence 
  17. # non-linear behavior from linear list.
  18. # 
  19. # [SXC]
  20. #
  21. # (C) 1998 LucasArts Entertainment Co. All Rights Reserved
  22. # ========================================================================================
  23.  
  24. symbols
  25.  
  26.     message     startup
  27.     message     activate
  28.     message     entered
  29.     message     arrived
  30.     message     damaged
  31.     message     crossed
  32.     message     user1
  33.     message     user4
  34.     message     user5
  35.     message     user6
  36.  
  37.     thing       player      local
  38.     
  39. # A REAL HINT FROM THE TEMPLATE
  40.     thing       curhint
  41.          
  42. # GHOST OBJECTS STANDING IN FOR HINTS
  43.     thing       ghint00     
  44.     thing       ghint01
  45.     thing       ghint02
  46.     thing       ghint03
  47.     thing       ghint04        
  48.     thing       ghint05        
  49.     thing       ghint06        
  50.     thing       ghint07        
  51.     thing       ghint08        
  52.     thing       ghint09        
  53.     thing       ghint10
  54.     thing       ghint11
  55.     thing       ghint12
  56.     thing       ghint13
  57.     thing       ghint14
  58.     thing       ghint15
  59.     thing       ghint16
  60.     thing       ghint17
  61.     thing       ghint18
  62.     thing       ghint19
  63.     thing       ghint20
  64.     thing       ghint21
  65.     thing       ghint22
  66.     thing       ghint23
  67.     thing       ghint24
  68.     thing       ghint25
  69.     
  70. # LIST OF ITEMS IN LEVEL        
  71.     thing       ghint00_switch      
  72.     thing       ghint01_waterkey
  73.     thing       ghint02_switch
  74.     sector      ghint03_sector
  75.     sector      snakesect0_h4      
  76.     sector      snakesect1_h5      
  77.     sector      snakesect2_h6      
  78.     sector      ghint07_sector
  79.     # hint 8 is the lightshaft in the statlock room
  80.     
  81. # GATEWAY FOR SUBGROUP 9 VOLODSCENE
  82.     surface         gh8_index9_surf_in                          
  83.     surface         gh8_index0_surf_out    
  84.     sector          ghint09_sector
  85.     thing           ghint10_key
  86.     # hint 11 is the fish switch in the underwater switch room
  87.     # hint 12 is the whip climb above the water pillar
  88.     sector          ghint12_sector
  89.     # hint 13 is the whip swing high above the water
  90.     # hint 14 is the fish idol
  91.     # hint 15 is the mirror
  92.     
  93. # GATEWAY FOR SUBGROUP 16 HABBIRD
  94.     surface         gh8_index16_surf_in                         
  95.     surface         gh8_index16_surf_out
  96.     sector          ghint16_sector
  97.     sector          ghint17_sector
  98.     thing           ghint18_switch
  99.     thing           ghint19_birdidol
  100.     
  101. # GATEWAY FOR SUBGROUP 20 THEATRE    
  102.     surface         gh8_index20_surf_in                         
  103.     surface         gh8_index20_surf_out
  104.     sector          ghint20_sector
  105.     sector          ghint21_sector
  106.     thing           ghint22_jagidol
  107.     
  108. # GATEWAY FOR SUBGROUP 23 IDOLROOM
  109.     surface         gh8_index23_surf_in                         
  110.     surface         gh8_index23_surf_out
  111.     sector          ghint23_sector
  112.     
  113. # LIST OF INTS SET TO EITHER 0(UNSOLVED) OR 1(SOLVED)    
  114.     int             ghintint00=0                    local        
  115.     int             ghintint01=0                    local
  116.     int             ghintint02=0                    local
  117.     int             ghintint03=0                    local
  118.     int             ghintint04=0                    local
  119.     int             ghintint05=0                    local
  120.     int             ghintint06=0                    local
  121.     int             ghintint07=0                    local
  122.     int             ghintint08=0                    local
  123.     int             ghintint09=0                    local
  124.     int             ghintint10=0                    local
  125.     int             ghintint11=0                    local
  126.     int             ghintint12=0                    local
  127.     int             ghintint13=0                    local
  128.     int             ghintint14=0                    local
  129.     int             ghintint15=0                    local
  130.     int             ghintint16=0                    local
  131.     int             ghintint17=0                    local
  132.     int             ghintint18=0                    local
  133.     int             ghintint19=0                    local
  134.     int             ghintint20=0                    local
  135.     int             ghintint21=0                    local
  136.     int             ghintint22=0                    local
  137.     int             ghintint23=0                    local
  138.     int             ghintint24=0                    local
  139.     int             ghintint25=0                    local
  140.     
  141.     int             curhintindex=0                              # value of the current unsolved hint
  142.     int             curhintref=0                    local       # first number in a given group of hints
  143.     int             hintint_index=0                 local       # counter variable. gets set to the first in the group
  144.     int             doneyet=0                       local
  145.     
  146.     flex            findlowestunsolved              local
  147.     flex            movehintpos                     local
  148.     flex            habitraildone                   local           
  149. end
  150.  
  151. code
  152.  
  153. # ========================================================================================
  154. startup:
  155.  
  156.     player = GetLocalPlayerThing();
  157.     
  158. return;
  159.  
  160. # ========================================================================================
  161. activate:
  162.     
  163.     if ((GetSenderRef() == ghint00_switch) && (ghintint00 == 0))
  164.     {
  165.         ghintint00=1;                               //set this hint solved
  166.         curhintref=0;                               //set current hint group reference num
  167.         call findlowestunsolved;                    //find the lowest unsolved hint in that group
  168.         call movehintpos;                           //pop the hint to the next valid hint position
  169.     }
  170.     
  171.     if ((GetSenderRef() == ghint01_waterkey) && (ghintint01 == 0))
  172.     {
  173.         ghintint01=1;
  174.         curhintref=0;
  175.         call findlowestunsolved;
  176.         call movehintpos;
  177.     }
  178.     
  179.     if ((GetSenderRef() == ghint02_switch) && (ghintint02 == 0))
  180.     {
  181.         ghintint02=1;
  182.         curhintref=0;
  183.         call findlowestunsolved;
  184.         call movehintpos;
  185.     }
  186.     
  187.     if ((GetSenderRef() == ghint14) && (ghintint14 == 0))
  188.     {
  189.         ghintint14=1;
  190.         curhintref=9;
  191.         call findlowestunsolved;
  192.         call movehintpos;
  193.     }
  194.     
  195.     if ((GetSenderRef() == ghint15) && (ghintint15 == 0))
  196.     {
  197.         //at the mirror setting hint back to refnum 0
  198.         ghintint15=1;
  199.         doneyet = doneyet + 1;
  200.         call habitraildone;
  201.         call findlowestunsolved;
  202.         call movehintpos;
  203.     }
  204.     
  205.     if ((GetSenderRef() == ghint18_switch) && (ghintint18 == 0))
  206.     {
  207.         ghintint18=1;
  208.         curhintref=16;
  209.         call findlowestunsolved;
  210.         call movehintpos;
  211.     }
  212.     
  213.     if ((GetSenderRef() == ghint19_birdidol) && (ghintint19 == 0))
  214.     {
  215.         // at birdidol setting hint refnum back to 0
  216.         ghintint18=1;
  217.         doneyet = doneyet + 1;
  218.         call habitraildone;
  219.         call findlowestunsolved;
  220.         call movehintpos;
  221.     }
  222.     
  223.     if ((GetSenderRef() == ghint22_jagidol) && (ghintint22 == 0))
  224.     {
  225.         // at jagidol setting hint refnum back to 0
  226.         ghintint22=1;
  227.         doneyet = doneyet + 1;
  228.         call habitraildone;
  229.         call findlowestunsolved;
  230.         call movehintpos;
  231.     }
  232.     
  233.     return;        
  234.         
  235. # ========================================================================================
  236. entered:
  237.     
  238.     if (GetSourceRef() != player) return;
  239.     
  240.     if ((GetSenderRef() == ghint03_sector) && (ghintint03 == 0))
  241.     {
  242.         ghintint03=1;                               //set this hint solved
  243.         curhintref=0;                               //set current hint group reference num
  244.         call findlowestunsolved;                    //find the lowest unsolved hint in that group
  245.         call movehintpos;                           //pop the hint to the next valid hint position
  246.     }
  247.     
  248.     if ((GetSenderRef() == ghint07_sector) && (ghintint07 == 0))
  249.     {
  250.         ghintint07=1;                               //set this hint solved
  251.         curhintref=0;                               //set current hint group reference num
  252.         call findlowestunsolved;                    //find the lowest unsolved hint in that group
  253.         call movehintpos;                           //pop the hint to the next valid hint position
  254.     }
  255.     
  256.     if ((GetSenderRef() == ghint09_sector) && (ghintint09== 0))
  257.     {
  258.         ghintint09=1;                               
  259.         curhintref=9;                               
  260.         call findlowestunsolved;                    
  261.         call movehintpos;                           
  262.     }
  263.     
  264.     if ((GetSenderRef() == ghint12_sector) && (GetSourceRef() == player) && (ghintint12 == 0))
  265.     {
  266.         ghintint12=1;                         
  267.         curhintref=9;                 
  268.         call findlowestunsolved;      
  269.         call movehintpos;
  270.     }
  271.     
  272.     if ((GetSenderRef() == ghint16_sector) && (ghintint16== 0))
  273.     {
  274.         ghintint16=1;                               
  275.         curhintref=16;                               
  276.         call findlowestunsolved;                    
  277.         call movehintpos;                           
  278.     }
  279.     
  280.     if ((GetSenderRef() == ghint17_sector) && (ghintint17== 0))
  281.     {
  282.         ghintint17=1;                               
  283.         curhintref=16;                               
  284.         call findlowestunsolved;                    
  285.         call movehintpos;                           
  286.     }
  287.     
  288.     if ((GetSenderRef() == ghint20_sector) && (ghintint20 == 0))
  289.     {
  290.         ghintint20=1;                               
  291.         curhintref=20;                               
  292.         call findlowestunsolved;                    
  293.         call movehintpos;                           
  294.     }
  295.     
  296.     if ((GetSenderRef() == ghint21_sector) && (ghintint21 == 0))
  297.     {
  298.         ghintint21=1;                               
  299.         curhintref=20;                               
  300.         call findlowestunsolved;                    
  301.         call movehintpos;                           
  302.     }
  303.     
  304.     if ((GetSenderRef() == ghint23_sector) && (ghintint23 == 0))
  305.     {
  306.         //checking to see if hints are back to linear
  307.         ghintint23=1;                               
  308.         doneyet = doneyet + 1;
  309.         call habitraildone;                               
  310.         call findlowestunsolved;                    
  311.         call movehintpos;                           
  312.     }
  313.     
  314. return;
  315.  
  316. # ========================================================================================
  317. arrived:
  318.     
  319.     if (GetSenderRef() == ghint10_key)
  320.     {
  321.         //print("hint 10 key solved");
  322.         ghintint10=1;
  323.         curhintref=9;                               //switching to subhint group 9
  324.         call findlowestunsolved;
  325.         call movehintpos;       
  326.     }
  327.     
  328.     if (GetSenderRef() == ghint11)
  329.     {
  330.         ghintint11=1;
  331.         curhintref=9;                               //switched to subhint group 9
  332.         call findlowestunsolved;
  333.         call movehintpos;       
  334.     }
  335.     
  336. return;    
  337.  
  338. # ========================================================================================
  339. damaged:
  340.  
  341.     if ((GetSenderRef() == ghint19_birdidol) && (ghintint19 == 0))
  342.     {
  343.         // at birdidol setting hint refnum back to 0
  344.         ghintint18=1;
  345.         curhintref=0;
  346.         call findlowestunsolved;
  347.         call movehintpos;
  348.     }
  349.     
  350.     
  351.     if ((GetSenderRef() == ghint13) && (GetParam(1) == 0x10) && (ghintint13 == 0))
  352.     {
  353.         ghintint13=1;                         
  354.         curhintref=9;                 
  355.         call findlowestunsolved;      
  356.         call movehintpos;
  357.     }             
  358.     
  359. return;
  360.  
  361. # ========================================================================================
  362. crossed:
  363.  
  364.     if ((GetSenderRef() == gh8_index9_surf_in) && (GetSourceRef() == player))
  365.     {
  366.         //switch to subgroup 9 *NOTE not setting ghintint08 to 1*
  367.         curhintref=9;                               
  368.         call findlowestunsolved;
  369.         call movehintpos;       
  370.     }
  371.     
  372.     if ((GetSenderRef() == gh8_index0_surf_out) && (GetSourceRef() == player))
  373.     {
  374.         //switch to subgroup 0 *NOTE not setting ghintint08 to 1*
  375.         curhintref=0;                               
  376.         call findlowestunsolved;
  377.         call movehintpos;       
  378.     }
  379.     
  380.     if ((GetSenderRef() == gh8_index16_surf_in) && (GetSourceRef() == player))
  381.     {
  382.         //switch to subgroup 16 *NOTE not setting ghintint08 to 1*
  383.         curhintref=16;                               
  384.         call findlowestunsolved;
  385.         call movehintpos;       
  386.     }
  387.     
  388.     if ((GetSenderRef() == gh8_index16_surf_out) && (GetSourceRef() == player))
  389.     {
  390.         //switch to subgroup 0 *NOTE not setting ghintint08 to 1*
  391.         curhintref=0;                               
  392.         call findlowestunsolved;
  393.         call movehintpos;       
  394.     }
  395.     
  396.     if ((GetSenderRef() == gh8_index20_surf_in) && (GetSourceRef() == player))
  397.     {
  398.         //switch to subgroup 20 *NOTE not setting ghintint08 to 1*
  399.         curhintref=20;                               
  400.         call findlowestunsolved;
  401.         call movehintpos;       
  402.     }
  403.     
  404.     if ((GetSenderRef() == gh8_index20_surf_out) && (GetSourceRef() == player))
  405.     {
  406.         //switch to subgroup 0 *NOTE not setting ghintint08 to 1*
  407.         curhintref=0;                               
  408.         call findlowestunsolved;
  409.         call movehintpos;       
  410.     }
  411.     
  412.     if ((GetSenderRef() == gh8_index23_surf_in) && (GetSourceRef() == player))
  413.     {
  414.         //switch to subgroup 23 *NOTE not setting ghintint08 to 1*
  415.         curhintref=23;                               
  416.         call findlowestunsolved;
  417.         call movehintpos;       
  418.     }
  419.     
  420.     if ((GetSenderRef() == gh8_index23_surf_out) && (GetSourceRef() == player))
  421.     {
  422.         //switch to subgroup 0 *NOTE not setting ghintint08 to 1*
  423.         curhintref=0;                               
  424.         call findlowestunsolved;
  425.         call movehintpos;       
  426.     }
  427.     
  428. return;
  429.  
  430. # ========================================================================================
  431. user1:
  432.     
  433.     //from the TEO_MirrorDoor
  434.     curhintref=24;
  435.     call findlowestunsolved;
  436.     call movehintpos;
  437.     
  438. return;
  439.  
  440. # ========================================================================================
  441.  
  442. user4:
  443.  
  444.     if (ghintint04 == 0)
  445.     {
  446.         ghintint04=1;
  447.         curhintref=0;
  448.         call findlowestunsolved;
  449.         call movehintpos;
  450.     }
  451.  
  452. return;
  453.  
  454. # ========================================================================================
  455.  
  456. user5:
  457.  
  458.     if (ghintint05 == 0)
  459.     {
  460.         ghintint05=1;
  461.         curhintref=0;
  462.         call findlowestunsolved;
  463.         call movehintpos;
  464.     }
  465.  
  466. return;
  467.  
  468. # ========================================================================================
  469.  
  470. user6:
  471.  
  472.     if (ghintint06 == 0)
  473.     {
  474.         ghintint06=1;
  475.         curhintref=0;
  476.         call findlowestunsolved;
  477.         call movehintpos;
  478.     }
  479.  
  480. return;
  481.  
  482. # ========================================================================================
  483. findlowestunsolved:
  484.  
  485.     //print("finding lowest unsolved hint");
  486.     hintint_index=curhintref;                       //set index to current hint reference
  487.     
  488.     while((ghintint00[hintint_index]) == 1)         //while the flag associated with hint is solved increment index
  489.     {
  490.         hintint_index=hintint_index + 1;
  491.     }
  492.     
  493.     curhintindex=hintint_index;                     //when the flag is equal to 0 pull the index and assign to curhintindex
  494.         
  495. return;
  496.  
  497. # ========================================================================================
  498. movehintpos:
  499.  
  500.     //print("popping hint");
  501.     TeleportThing(curhint, ghint00[curhintindex]);  //pops the hint to the lowest unsolved hint in the appropriate area
  502.  
  503. return;
  504.  
  505. # ========================================================================================
  506. habitraildone:
  507.  
  508.     if (doneyet == 4)
  509.     {
  510.         curhintref=24;
  511.         //print("all areas are done setting hints to subgroup 24");
  512.     }
  513.     else
  514.     {
  515.         curhintref=0;
  516.     }
  517.     
  518. return;    
  519.     
  520. # ========================================================================================
  521.     
  522. end
  523.  
  524.